home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.20030409-20031118 / 000240_fdc@sesame.cc.columbia.edu_Wed Aug 27 15:05:23 EDT 2003.msg < prev    next >
Text File  |  2020-01-01  |  3KB  |  77 lines
  1. Article: 14480 of comp.protocols.kermit.misc
  2. Path: newsmaster.cc.columbia.edu!news-not-for-mail
  3. From: fdc@sesame.cc.columbia.edu (Frank da Cruz)
  4. Newsgroups: comp.protocols.kermit.misc
  5. Subject: Re: How to recover from a hangup?
  6. Date: 27 Aug 2003 15:05:16 -0400
  7. Organization: Columbia University
  8. Lines: 60
  9. Message-ID: <biivdc$t5d$1@sesame.cc.columbia.edu>
  10. References: <uoppkvgocr6vgbptg62fm7osanrjhontk3@4ax.com>
  11. NNTP-Posting-Host: sesame.cc.columbia.edu
  12. X-Trace: newsmaster.cc.columbia.edu 1062011116 28690 128.59.59.56 (27 Aug 2003 19:05:16 GMT)
  13. X-Complaints-To: postmaster@columbia.edu
  14. NNTP-Posting-Date: 27 Aug 2003 19:05:16 GMT
  15. Xref: newsmaster.cc.columbia.edu comp.protocols.kermit.misc:14480
  16.  
  17. In article <uoppkvgocr6vgbptg62fm7osanrjhontk3@4ax.com>,
  18. dgk  <sonicechoesWithNoSpam@hotmail.com> wrote:
  19. : I have an app that uses some of the K95 provided scripts and answers
  20. : calls and has a simple dialog. I have a problem that results in the
  21. : Kermit dos box printing this line over and over:
  22. : 
  23. : ?Connection on Conexant HCF V90 56K Data Fax PCI Modem is not open.
  24. : 
  25. : The script is kicked off by this section of code from Dhostmdm.KSC
  26. : 
  27. : ; Break out of loop if there is a nonrecoverable error, otherwise
  28. : ; continue.
  29. : 
  30. : while 1 {
  31. :     answer
  32. :     if > \v(dialstatus) 0 if < \v(dialstatus) 22 stop 1 Fatal modem error
  33. :     if = \v(dialstatus) 0 take MM3.ksc
  34. :     echo Type Ctrl-C to exit...          ; Give user a chance to cancel
  35. :     sleep 2
  36. : }
  37. : 
  38. : MM3.KSC just asks for a username and password, and then a menu option
  39. : here:
  40. : 
  41. : ASG \%T 0
  42. : :GETCMD    ; What does the user want to do anyway?
  43. : OUTPUT \13\10Command:
  44. : CLEAR INPUT
  45. : INPUT 10 \13
  46. : DEF \%C
  47. : DEF \%Z \V(INPUT)
  48. : DO STRIP {\%Z}
  49. : IF = \FLENGTH(\%Z) 0 GOTO GETCMD
  50. : ASG \%C \%N
  51. : IF EQUAL {\%C} SND GOTO RECEIVE
  52. : IF EQUAL {\%C} {RCV R} GOTO SEND
  53. : IF EQUAL {\%C} BYE GOTO IFAIL
  54. : IF EQUAL {\%C} {RCV M} GOTO SENDM
  55. : OUTPUT \13\10REQUEST ERROR|\%C|
  56. : INC \%T 1
  57. : IF = \%T 4 GOTO IFAIL
  58. : GOTO GETCMD
  59. : 
  60. : 
  61. : I'll be the first person to admit that I don't know much of the Kermit
  62. : language but the code works some of the time that a user hangs up.
  63. : Othertimes I get that line repeating and have to restart Kermit.
  64. : 
  65. : Is there some error checking I should be doing here to prevent the
  66. : hangup from messing the modem up?
  67. :
  68. That's what it sounds like.  Every command that could fail should be
  69. checked.  Your MM3.KSC file is a GOTO loop containing INPUTs and OUTPUTs.
  70. These commands fail if the connection is lost, but your script doesn't
  71. check for it, so loops forever, printing error messages.  See the
  72. tutorial:
  73.  
  74.   http://www.columbia.edu/kermit/ckscripts.html#tut
  75.  
  76. - Frank
  77.